home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / lists / mint / l_0799 / 516 < prev    next >
Encoding:
Internet Message Format  |  1994-08-27  |  3.9 KB
  1. Subject: put shells etc. on (virtual) tty without init...
  2. Date: Wed, 29 Sep 93 23:42:26 CET
  3. From: Juergen Lock <nox@jelal.north.de>
  4. Message-Id: <9309292242.AA00164@jelal.north.de>
  5.  
  6. here's a little hack that puts a command or shell on a terminal.  useful
  7. when you don't have enough RAM for init _and_ gcc...  (or when you don't
  8. like init for some other reason though i can't think of one :-)
  9.  
  10.  easiest way, and also a good place in terms of memory fragmentation is
  11. to put it in a mint.cnf:  (otherwise it can be called from anywhere.)
  12.  
  13. # first start virtual consoles... (of course other ttys should also work :)
  14. exec u:\c\usr\etc\vcon.ttp
  15. ren u:\dev\console u:\dev\con0
  16. ren u:\dev\vt00 u:\dev\console
  17. CON=u:\dev\console
  18. # turn on cursor (make the ^[ one esc char)
  19. echo ^[e
  20. . 
  21. . 
  22. # set $SHELL (default is /bin/sh)
  23. setenv SHELL u:\bin\ksh.ttp
  24. # (and also $HOME, $TERM...)
  25. . 
  26. . 
  27. cd u:\home\nox
  28. # init for console (could also be GEM... i prefer to start it from the
  29. # shell when i need it)
  30. INIT=c:\bin\ksh.ttp -L
  31.  
  32. # everything set, now put a top on vt01...
  33. exec u:\c\local\bin\runtt.ttp -t vt01 top
  34. # and 2 (more) shells on vt02 and 3
  35. exec u:\c\local\bin\runtt.ttp -t vt02
  36. exec u:\c\local\bin\runtt.ttp -t vt03
  37. # maybe add a sleep here so the shells have time to come up before GEM.
  38.  
  39.  again, comments welcome...
  40.     Juergen
  41.  
  42. -------cut-here------------
  43. /* runtt -- poor man's init :) for MiNT
  44.    open tty, setpgrp(), exec command on it...
  45.  
  46.    usage: runtt command >tty
  47.       or: runtt -T tty command  (empty command gets loginshell)
  48.       or: runtt -t tty command  (like -T but (t)forks before.)
  49. */
  50.  
  51. #include <stdio.h>
  52. #include <stdlib.h>
  53. #include <string.h>
  54. #include <signal.h>
  55. #include <setjmp.h>
  56. #include <ioctl.h>
  57. #include <fcntl.h>
  58. #include <unistd.h>
  59. #include <support.h>
  60. #include <mintbind.h>
  61. #include <errno.h>
  62.  
  63. static jmp_buf    tforkj;
  64.  
  65. static int in_tfork(arg)
  66. int arg;
  67. {
  68.     /* wait for parent to die before we can longjmp back */
  69.     while (getppid () > 1)
  70.         (void) Fselect (1000, 0l, 0l, 0l);
  71.     longjmp (tforkj, 1);
  72.     /*NOTREACHED*/
  73. }
  74.  
  75. static jmp_buf stopj;
  76.  
  77. void ttout(sig)
  78. int sig;
  79. {
  80.     longjmp (stopj, 1);
  81. }
  82.  
  83. int main(argc, argv)
  84. int argc;
  85. char **argv;
  86. {
  87.     long pgrp = setpgrp(/*getpid(), getpid()*/);
  88.     static char *name, buf[0x100] = "/dev/", **xargv;
  89.     static int tty, do_fork = 0;
  90.     char *shell;
  91.  
  92.     xargv = argv;
  93.     if (argv[1] && argv[1][0] == '-' && (argv[1][1] | 0x20) == 't'
  94.         && !argv[1][2] && (name = argv[2])) {
  95.         if (*name != '/' && *name != '\\' &&
  96.             (!*name || name[1] != ':')) {
  97.             strcat (buf, name);
  98.             name = buf;
  99.         }
  100.         if (argv[1][1] == 't')
  101.             do_fork = 1;
  102.         tty = open(name, O_RDWR);
  103.         xargv += 2;
  104.     } else {
  105.         name = ttyname(1);
  106.         tty = dup(1);
  107.     }
  108.  
  109.     if (tty == -1 || pgrp < 0) {
  110.         signal (SIGTTOU, SIG_IGN);
  111.         perror(name);
  112.         exit(1);
  113.     }
  114.     /* tty in use?  stat doesn't tell on MiNT, so... */
  115.     signal (SIGTTOU, ttout);
  116.     if (_isctty(tty) || setjmp (stopj)) {
  117.         signal (SIGTTOU, SIG_IGN);
  118.         fprintf(stderr, "%s: tty in use\n", name);
  119.         exit(1);
  120.         /* keep compiler happy */
  121.         return 1;
  122.     }
  123.     /* write NUL to trigger SIGTTOU... */
  124.     Fputchar (tty, 0, 0);
  125.     /* if we get here there was no sig */
  126.     if (do_fork) {
  127.         Fcntl (tty, 0, F_SETFD);
  128.         if (!setjmp(tforkj) && tfork (in_tfork, 0) >= 0)
  129.             _exit (0);
  130.     }
  131.     dup2(tty, -1);
  132.     ioctl (-1, TIOCSPGRP, &pgrp);
  133.  
  134.     dup2(tty, 0);
  135.     dup2(tty, 1);
  136.     dup2(tty, 2);
  137.  
  138.     close(tty);
  139.  
  140.     shell = getenv("SHELL");
  141.     if (!shell)
  142.         shell = "/bin/sh";
  143.     if (!xargv[1] ||
  144.         (execvp((name = xargv[1]), xargv+1) < 0 &&
  145.          (errno == ENOEXEC || errno == ENOENT))) {
  146.         name = shell;
  147.  
  148.         /* loginshell? */
  149.         if (!xargv[1]) {
  150.             char *p, *q;
  151.  
  152.             for (p = shell; (q = strpbrk(p, "/\\:"));)
  153.                 p = ++q;
  154.             xargv[0] = q = buf;
  155.             *q++ = '-';
  156.             strcpy (q, p);
  157.         } else
  158.             xargv[0] = shell;
  159.         execv(shell, xargv);
  160.     }
  161.     perror(name);
  162.     exit(1);
  163.     return 1;
  164. }
  165. -- 
  166. J"urgen Lock / nox@jelal.north.de / UUCP: ..!uunet!unido!uniol!jelal!nox
  167.                                 ...ohne Gewehr
  168. PGP public key fingerprint =  8A 18 58 54 03 7B FC 12  1F 8B 63 C7 19 27 CF DA 
  169.